Labels:book | bulletin board | chat room | poster | reckoner | rock | sky | windowpane OCR: Chapter Windows 11#9 Window+ adds support for views, and also zooming Unless your window is to be very basic indeed you should use this class Superclass Window Source file Window+ Status Optional Instance variables ptr ^contView Pointer to the ContView the view consisting of the whole contents of the window bool zoomFIg True this window is to be zoomable Indexed data None System objects None Methods accessing setZoom: b-- Passed-in boolean indicates if this window will be zoomable getView: ^view Returns pointer to the ContView setView: Aview -- Sets the ContView. event handling grow: Handles a click in the grow box zoom Handles a click in the zoom box enable Handles an activate event. Sends enable: to the Contview which causes enable to be sent to all child views as well. disable: ( Handle ...
